Top 10k strings from Specgraph (1984)(Anirog Software).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [TZX] (TOSEC-v2007-01-01) /

Back to the directory listing

   6 ;"        "
   3 a(s(set)):
   3 S(SET),LEN
   2 count=count+1
   2 ;"PRESS ANY KEY TO CONTINUE":
   2 ;"       "
   2 9 OR ALL): ";I$:
   2 -width),175
   2 *"M";DR;N$
   2 "MICRODRIVE?(Y/N) ";I$:
   2 "DRIVE NUMBER: ";DR
   1 unt1=count1+1
   1 stach+height*width>164
   1 stabyt=16384
   1 s(i)=udg-i*168
   1 line=line+5
   1 line+j,col;p$
   1 l<height*8
   1 count2=count2+8
   1 c$+height*width
   1 SS        
   1 SPECGRAFM 
   1 SP        ;+
   1 SC        
   1 S(SET),LEN:
   1 ;"________________________________"
   1 ;"V MIRROR";
   1 ;"SPECGRAPH MENU"
   1 ;"R ROTATE";
   1 ;"PRESS NUMBER OF REQUIRED SET"'"(0 TO 9): "
   1 ;"PRESS NUMBER OF REQUIRED SET"
   1 ;"PRESS NUMBER OF OPTION REQUIRED"
   1 ;"P PRINT"
   1 ;"N NEWSET";
   1 ;"LOADING"
   1 ;"I INVERT"
   1 ;"HEX OR DECIMAL (H/D)"
   1 ;"HARD COPY (Y/N)"
   1 ;"H MIRROR";
   1 ;"FORMAT MENU"
   1 ;"FIRST CHARACTER TO BE DEFINED "
   1 ;"F FILL";
   1 ;"ENTER OPTION REQUIRED (1 TO 7)"
   1 ;"E ERASE";
   1 ;"DEFINE MORE CHARS (Y/N) "
   1 ;"CURRENT";
   1 ;"CHARACTER SET ";set-1
   1 ;"BYTE VALUES STORED IN SET ";set-1
   1 ;"B BLANK";
   1 ;"=======";
   1 ;"(9) ";g$(
   1 ;"(8) ";g$(
   1 ;"(7) ";g$(
   1 ;"(6) ";g$(
   1 ;"(5) ";g$(1
   1 ;"(4) ";g$(
   1 ;"(3) ";g$(1
   1 ;"(2) ";g$(
   1 ;"(1) VIEW WHOLE SET"''"(2) SAVE SET TO TAPE"''"(3) LOAD SET FROM TAPE"''"(4) CHANGE SET"''"(5) DEFINE CHARACTERS"''"(6) EXIT FROM PROGRAM"
   1 ;"(1) ";g$(1
   1 ;"       ":
   1 222222222222222222222222222222**222222222222222222222222222222**222222222222222222222222222222***********************************
   1 1111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111112222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222
   1 -width;s$:
   1 ***************
   1 (stach+count)+k,
   1 (stach+count)
   1 (stabyt+j+256
   1 '"(7) PRINT BYTE VALUES"
   1 "SET TO BE SAVED"'"(0
   1 "SET TO BE LOADED"'"(0
   1 "NAME OF TAPE FILE: ";n$
   1 "NAME FOR TAPE FILE: ";n$:
   1 "ERASE OLD FILE?(Y/N) ";I$:
   1 "+i$(count1,count2